home *** CD-ROM | disk | FTP | other *** search
- object frmURL: TfrmURL
- Left = 276
- Top = 638
- HelpContext = 105
- ActiveControl = txtFile
- BorderStyle = bsDialog
- Caption = 'URL Builder'
- ClientHeight = 197
- ClientWidth = 588
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- KeyPreview = True
- Position = poScreenCenter
- ShowHint = True
- OnCreate = FormCreate
- OnDeactivate = FormDeactivate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 4
- Top = 4
- Width = 577
- Height = 157
- Shape = bsFrame
- IsControl = True
- end
- object lblResourceType: TLabel
- Left = 12
- Top = 8
- Width = 73
- Height = 13
- Caption = '&Resource Type'
- FocusControl = lstType
- end
- object lblServer: TLabel
- Left = 144
- Top = 24
- Width = 34
- Height = 13
- Caption = '&Server:'
- Enabled = False
- FocusControl = txtServer
- end
- object lblPort: TLabel
- Left = 144
- Top = 52
- Width = 22
- Height = 13
- Caption = '&Port:'
- Enabled = False
- FocusControl = txtPort
- end
- object lblFile: TLabel
- Left = 144
- Top = 80
- Width = 19
- Height = 13
- Caption = '&File:'
- FocusControl = txtFile
- end
- object lblAnchor: TLabel
- Left = 144
- Top = 108
- Width = 37
- Height = 13
- Caption = '&Anchor:'
- FocusControl = txtAnchor
- end
- object lblURL: TLabel
- Left = 16
- Top = 136
- Width = 25
- Height = 13
- Caption = '&URL:'
- FocusControl = cmbURL
- end
- object OKBtn: TBitBtn
- Left = 336
- Top = 168
- Width = 77
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 4
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object CancelBtn: TBitBtn
- Left = 420
- Top = 168
- Width = 77
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 5
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object HelpBtn: TBitBtn
- Left = 504
- Top = 168
- Width = 77
- Height = 25
- Caption = '&Help'
- TabOrder = 6
- OnClick = HelpBtnClick
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object lstType: TListBox
- Left = 12
- Top = 24
- Width = 125
- Height = 93
- Hint =
- 'Use http:// for www resources or none for document path relative' +
- ' to current file'
- ItemHeight = 13
- Items.Strings = (
- 'none'
- 'http://'
- 'afs://'
- 'gopher://'
- 'file://'
- 'file://localhost/'
- 'ftp://'
- 'mailto:'
- 'news:'
- 'newsrc:'
- 'nntp://'
- 'telnet://'
- 'wais://')
- TabOrder = 7
- OnClick = UpdateURL
- OnDblClick = lstTypeDblClick
- OnKeyUp = lstTypeKeyUp
- end
- object txtServer: TEdit
- Left = 192
- Top = 20
- Width = 229
- Height = 21
- Hint = 'Server name (e.g., myserver.com)'
- Enabled = False
- TabOrder = 0
- OnChange = UpdateURL
- end
- object txtFile: TEdit
- Left = 192
- Top = 76
- Width = 145
- Height = 21
- Hint = 'Name of file on server (e.g., myfile.html)'
- TabOrder = 2
- OnChange = UpdateURL
- OnKeyPress = txtFileKeyPress
- end
- object txtAnchor: TEdit
- Left = 192
- Top = 104
- Width = 229
- Height = 21
- Hint = 'Named location within a file'
- TabOrder = 3
- OnChange = UpdateURL
- end
- object txtPort: TEdit
- Left = 192
- Top = 48
- Width = 61
- Height = 21
- Hint = 'Required only if resource server is on a non-standard port'
- Enabled = False
- TabOrder = 1
- OnChange = UpdateURL
- end
- object bbtnBrowse: TBitBtn
- Left = 344
- Top = 73
- Width = 77
- Height = 25
- Hint = 'Search for file on local computer'
- Caption = '&Browse'
- TabOrder = 8
- OnClick = bbtnBrowseClick
- Glyph.Data = {
- 12040000424D1204000000000000760000002800000054000000150000000100
- 0400000000009C03000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777777777777777777777777777777777777777777777777777777777777
- 7777777700007777777777777777777777777777777777777777777777777777
- 77777777777F7F7F7F7F7F7F7F7F7F7F00007777777777777777777777777777
- 7777777777777777777777777777777777777777777777777777777700007777
- 777777777777777777777FFFFFFFFFFFF77777777777777777777777777F7F7F
- 7F7F7F7F7F7F7F7F00007780000000000000777777778888888888888F777777
- 8000000000000077777778000000000000077777000077007B7B7B7B7B7B0777
- 77788F777777777778F77777007B7B7B7B7B7B07777F7007B7B7B7B7B7B07F7F
- 0000770F07B7B7B7B7B707777778F8F77777777778F777770707B7B7B7B7B7B0
- 777770707B7B7B7B7B7B07770000770B0B7B7B7B7B7B07777778F8F777777777
- 778F77770BB07B7B7B7B7B7B077F70BB07B7B7B7B7B7B07F0000770F0BB7B7B7
- B7B7B0777778F78F77777777778F777707BF000007B7B7B7B077707B7000007B
- 7B7B7B070000770BF07B7B7B7B7B70777778F78FFFFF77777778F7770BFBFBFB
- F0000000077F70B7BF0FFF000000007F0000770FB0B7B7B7B7B7B0777778F778
- 8888FFFFFFF8F77707BFBFBFBFBFB0777777707B7B0FFFFFFFF077770000770B
- F07B7B7B7B7B7B077778F77777778888888777770BFBFBFBFBFBF077777F70B7
- BF0FFFFFFFF07F7F0000770FBF000000B7B7B7077778F777777777778F777777
- 07BFBFBFBFBFB0777777707B7B0FFFFFFFF077770000770BFBFBFBF000000077
- 7778F7777FFFFFFF8F7777770BFBFBFBFBFBF077777F70B7BF0FFFFFFFF07F7F
- 0000770FBFBF0000000777777778FFFFF88888887777777707BFBF0000000777
- 7777707B7B0FFFFFFFF077770000777000007777777777777777888887777777
- 777777777000007777777777777F7F00000FFFFF00007F7F0000777777777777
- 77777777777777777777777777777777777777777777777777777777770FFFFF
- 0F07777700007777777777777777777777777777777777777777777777777777
- 77777777777F7F7F7F0FFFFF007F7F7F00007777777777777777777777777777
- 7777777777777777777777777777777777777777770000000777777700007777
- 77777777777777777777777777777777777777777777777777777777777F7F7F
- 7F7F7F7F7F7F7F7F000077777777777777777777777777777777777777777777
- 77777777777777777777777777777777777777770000}
- NumGlyphs = 4
- end
- object cmbURL: TComboBox
- Left = 48
- Top = 132
- Width = 373
- Height = 21
- Hint = 'Click on dropdown for list of previous URLs'
- ItemHeight = 13
- Sorted = True
- TabOrder = 9
- OnChange = cmbURLChange
- OnClick = cmbURLClick
- OnKeyPress = cmbURLKeyPress
- end
- object chkChangeDOSSlashes: TCheckBox
- Left = 268
- Top = 48
- Width = 149
- Height = 17
- Caption = 'Re&verse DOS Slashes'
- TabOrder = 10
- Visible = False
- OnClick = chkChangeDOSSlashesClick
- end
- object pnlPreview: TPanel
- Left = 432
- Top = 16
- Width = 137
- Height = 137
- BevelOuter = bvLowered
- TabOrder = 11
- object imgPreview: TPMultiImage
- Left = 1
- Top = 1
- Width = 135
- Height = 135
- Align = alClient
- Color = clBtnFace
- ImageName = 'file not found'
- ImageDither = True
- ImageReadRes = lAutoMatic
- ImageWriteRes = sAutoMatic
- TifSaveCompress = sNONE
- JPegSaveQuality = 25
- JPegSaveSmooth = 0
- TextLeft = 0
- TextTop = 0
- TextRotate = 0
- TabOrder = 0
- TabStop = False
- end
- object pnlImageStatus: TPanel
- Left = 112
- Top = 120
- Width = 25
- Height = 17
- BevelInner = bvRaised
- Caption = 'Off'
- TabOrder = 1
- OnClick = pnlImageStatusClick
- end
- end
- object dlgOpen: TOpenDialog
- DefaultExt = 'GIF'
- FileEditStyle = fsEdit
- FileName = '*.*'
- Filter =
- 'All Files (*.*)|*.*|HTML Files (*.HTML;*.HTM;*.HT3)|*.HTML;*.HTM' +
- ';*.HT3|Image Files (*.GIF;*.JPG;*.BMP)|*.GIF;*.JPG;*.BMP|Audio F' +
- 'iles (*.WAV;*.AU;*.SND)|*.WAV;*.AU;*.SND'
- Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
- Title = 'Select File'
- Left = 7
- Top = 164
- end
- end
-